home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 19 / CU Amiga Magazine's Super CD-ROM 19 (1998)(EMAP Images)(GB)[!][issue 1998-02].iso / CUCD / Magazine / SoundLab / Studio16add / scripts / StereoAIFF2Studio < prev    next >
Encoding:
AmigaDOS Script File  |  1997-12-07  |  1.8 KB  |  89 lines
  1. .key AIFFFILE/A,STUDIOBASE/A
  2. .bra {
  3. .ket }
  4.  
  5. ; This script will convert a stereo AIFF file into two Studio 16 files.
  6. ;
  7. ; $VER: StereoAIFF2Studio 1.1 (07.12.97)
  8. ; Created by Kenneth 'Kenny' Nilsen (kenny@bgnett.no)
  9. ;
  10. ; USAGE: StereoAIFF2Studio <stereoAIFF> <Studio16base>
  11. ;
  12. ; NOTE: The commands must be in the command search path. To be safe
  13. ; copy the commands in C: or add the path where you keep the commands to
  14. ; the global search path (startup-sequence: path <path> ADD).
  15.  
  16. ;** check files:
  17.  
  18. if not exists {AIFFFILE}
  19.     echo "File '{AIFFFILE}' doesn't exist!"
  20.     skip Final
  21.     endif
  22.  
  23. if exists "{STUDIOBASE}_L"
  24.     echo "WARNING: File '{STUDIOBASE}_L' already exist!"
  25.     ask "Continue ? (y/N)"
  26.     if not WARN
  27.        echo "Terminating.."
  28.        skip Final
  29.        endif
  30.     endif
  31.  
  32. if exists "{STUDIOBASE}_R"
  33.     echo "WARNING: File '{STUDIOBASE}_R' already exist!"
  34.     ask "Continue ? (y/N)"
  35.     if not WARN
  36.        echo "Terminating.."
  37.        skip Final
  38.        endif
  39.     endif
  40.  
  41. ;** Ok, start the programs
  42.  
  43. delete {STUDIOBASE}_L >nil:
  44. delete {STUDIOBASE}_R >nil:
  45.  
  46. echo "Converting... please wait"
  47.  
  48. SplitAIFF {AIFFFILE} {STUDIOBASE} >nil:
  49. if WARN
  50.     echo "Error while splitting AIFF file!"
  51.     skip Final
  52.     endif
  53.  
  54. AIFF2Studio {STUDIOBASE}.L {STUDIOBASE}_L >nil:
  55. if WARN
  56.     echo "Error while converting AIFF to Studio 16 file!"
  57.     skip Final
  58.     endif
  59.  
  60. delete {STUDIOBASE}.L >nil:
  61.  
  62. AIFF2Studio {STUDIOBASE}.R {STUDIOBASE}_R >nil:
  63. if WARN
  64.     echo "Error while converting AIFF to Studio 16 file!"
  65.     skip Final
  66.     endif
  67.  
  68. delete {STUDIOBASE}.R >nil:
  69.  
  70. rename {STUDIOBASE}_L_MONO {STUDIOBASE}_L >nil:
  71. rename {STUDIOBASE}_R_MONO {STUDIOBASE}_R >nil:
  72.  
  73. S16SetPan {STUDIOBASE}_L 0 >nil:
  74. if WARN
  75.     echo "Error while setting '{STUDIOBASE}_L' to LEFT"
  76.     endif
  77.  
  78. S16SetPan {STUDIOBASE}_R 200 >nil:
  79. if WARN
  80.     echo "Error while setting '{STUDIOBASE}_R' to RIGHT"
  81.     endif
  82.  
  83. ;** We're done
  84.  
  85. Echo "Done"
  86. Echo ""
  87.  
  88. Lab Final
  89.